Usenet 1993 July

home *** CD-ROM | disk | FTP | other *** search

/ Usenet 1993 July / InfoMagic USENET CD-ROM July 1993.ISO / sources / misc / volume27 / psf3 / part04 < prev next >

Wrap

Text File | 1992-01-20 | 54.6 KB | 2,204 lines

Newsgroups: comp.sources.misc From: tony@ajfcal.cuc.ab.ca (Tony Field) Subject: v27i095: psf3 - Postscript print filter system, v3, Part04/09 Message-ID: <1992Jan21.013120.11267@sparky.imd.sterling.com> X-Md4-Signature: 1166bdd4dfd351a50103317aea6fb7ae Date: Tue, 21 Jan 1992 01:31:20 GMT Approved: kent@sparky.imd.sterling.com Submitted-by: tony@ajfcal.cuc.ab.ca (Tony Field) Posting-number: Volume 27, Issue 95 Archive-name: psf3/part04 Environment: ISC, SUNOS, SYSVR3, DOS Supersedes: psf2: Volume 12, Issue 4-9 #! /bin/sh # This is a shell archive. Remove anything before this line, then unpack # it by saving it into a file and typing "sh file". To overwrite existing # files, type "sh file -c". You can also feed this as standard input via # unshar, or by typing "sh <file", e.g.. If this archive is complete, you # will see the following message at the end: # "End of archive 4 (of 9)." # Contents: Changes Makefile.dos defs/cn_500j1.def defs/dp_us470.def # defs/epl3kf21.def defs/ibm20470.def defs/ibm39521.def # defs/ibm39523.def defs/ok801+f1.def defs/scg20522.def # defs/tkphzr31.def defs/uni39521.def getopt.c man/psfbanner.1 # man/psfbanner.doc man/psfmail.1 man/psfmail.doc psf.h psfman.SH # psfproto.h psfunix.LP psfxenix.LP # Wrapped by ajf@trifid on Sat Jan 18 22:55:49 1992 PATH=/bin:/usr/bin:/usr/ucb ; export PATH if test -f 'Changes' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'Changes'\" else echo shar: Extracting \"'Changes'\" $1545 characters$ sed "s/^X//" >'Changes' <<'END_OF_FILE' X Psf changes between version 2 and 3 X X 1. Page rotation and scaling has been corrected. In particular, X problems with landscape printing have been fixed. X X 2. Changes have been made to allow psf to work with the lpr/lpd X spooling system. Read "Install.lpd" for details. X X 3. Reverse order printing is added. X X 4. The original Install.unix and Install.xenix installation scripts X are no longer used. All installation is done with make. Read X "Readme.unix" for details X X 5. A postscript programme "getsizes.ps" has been added so that X the imageable area of almost any page size on almost any X printer can be determined. Documentation for manual X preparation of a .def file has been clarified. X X 6. Xenix is no longer supported - however a xenix installation X with X make installxenix X X should work. It has not been tested. X X 7. Documentation has been upgraded a bit. X X 8. Line clipping on 2 and 4 up printing has been implemented. X X 9. Added -s option to display print line and column counts for X different point and page sizes. X X 10. Language support for European languages. X X 11. Name conflicts with OpenWindows "forced" changes in names X of programmes: X X old name new name X ------------ ----------- X psman psfman X pnf psfbs X pmf psfmail X psnroff psfnroff X psd psfdoub X psdouble psfdouble X psmbox psfmbox X X ------------------- X Tony Field X (tony@ajfcal.cuc.ab.ca) END_OF_FILE if test 1545 -ne `wc -c <'Changes'`; then echo shar: \"'Changes'\" unpacked with wrong size! fi # end of 'Changes' fi if test -f 'Makefile.dos' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'Makefile.dos'\" else echo shar: Extracting \"'Makefile.dos'\" $2313 characters$ sed "s/^X//" >'Makefile.dos' <<'END_OF_FILE' X# Make psf (Microsoft C 5.1) X# ======== X# X# usage: make all compile psf binaries X# make printer select your printer X# make installdos install to destination directories X# make doc create doc files (with cawf) X# make clean remove binaries and doc file X X# (NOTE: This makefile will not run with "make" that comes with X# Microsoft C 5.1. You must use a "reasonable" make! X XNROFF = cawf X X X# Location of binaries and scripts X# ^^^^^^^^^^^^^^^^^^^^ XBINDIR=c:/bin X X# Loation of psfprint.def: X# ^^^^^^^^^^^^^^^^^^^^^^^ XDEFFILE=c:/lib/psfprint.def X X XCFLAGS =-DBINDIR=\"$(BINDIR)\" -DPDEF=\"$(DEFFILE)\" X Xall: psf.exe psfdoub.exe selectde.exe psfbs.exe X Xpsf.obj: psf.h psf.c ctp.h Xpsf.exe: psf.obj getopt.obj X link /NOE /STACK:20000 psf.obj getopt.obj c:\mc\lib\setargv,,,; X Xpsfbs.obj: psf.h psfbs.c ctp.h Xpsfbs.exe: psfbs.obj getopt.obj X link /NOE /STACK:20000 psfbs.obj getopt.obj c:\mc\lib\setargv,,,; X Xpsfdoub.obj: psf.h psfdoub.c ctp.h Xpsfdoub.exe: psfdoub.obj getopt.obj X link /NOE /STACK:20000 psfdoub.obj getopt.obj c:\mc\lib\setargv,,,; X Xselectde.obj: psf.h selectde.c ctp.h Xselectde.exe: selectde.obj getopt.obj X link /NOE /STACK:20000 selectde.obj getopt.obj c:\mc\lib\setargv,,,; X Xgetopt.obj: getopt.c X X Xprinter: X selectde ./defs/*.def X X# install system X# ^^^^^^^^^^^^^^ Xinstall: X @echo - X @echo First: 'make printer' X @echo 'make pack (exepack)' X @echo Then: 'make installdos' X Xinstalldos: X xcopy psf.exe $(BINDIR) X xcopy psfdoub.exe $(BINDIR) X xcopy psfprint.def $(DEFFILE) X xcopy psfbs.exe $(BINDIR) X xcopy psfnroff.bat $(BINDIR) X Xpack: X exepack psf.exe z9901 X xcopy z9901 psf.exe X exepack psfdoub.exe z9901 X xcopy z9901 psfdoub.exe X exepack psfbs.exe z9901 X xcopy z9901 psfbs.exe X exepack selectde.exe z9901 X xcopy z9901 selectde.exe X rm z9901 X X X# Generate formatted document files. X# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ Xdoc: X $(NROFF) -man man/psf.1 | bsfilt - > man/psf.doc X $(NROFF) -man man/psfbs.1 | bsfilt - > man/psfbs.doc X $(NROFF) -man man/psfdoub.1 | bsfilt - > man/psfdoub.doc X $(NROFF) -man man/psfnroff.1 | bsfilt - > man/psfnroff.doc X X# zoo a binary distribution X# ^^^^^^^^^^^^^^^^^^^^^^^^^ Xzoo: X zoo a psf.zoo man/*.* defs/*.* *.exe *.bat Readme.dos Install.dos Install.def NOTICE testfile getsizes.ps selectde.exe X Xclean: X rm *.obj *.map *.exe *.bak END_OF_FILE if test 2313 -ne `wc -c <'Makefile.dos'`; then echo shar: \"'Makefile.dos'\" unpacked with wrong size! fi # end of 'Makefile.dos' fi if test -f 'defs/cn_500j1.def' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'defs/cn_500j1.def'\" else echo shar: Extracting \"'defs/cn_500j1.def'\" $2277 characters$ sed "s/^X//" >'defs/cn_500j1.def' <<'END_OF_FILE' X*printer XCanon PS-IPU Kanji Color Laser Copier v52.3 X*paper 7 XLetter Xstatusdict begin lettertray end X 612 792 12 15 588 780 XLegal Xstatusdict begin legaltray end X 612 1008 12 12 598 984 XTabloid Xstatusdict begin 11x17tray end X 792 1224 12 12 777 1200 XA3 Xstatusdict begin a3tray end X 842 1190 12 12 829 1166 XA4 Xstatusdict begin a4tray end X 595 842 12 12 571 829 XB4 Xstatusdict begin b4tray end X 729 1032 12 12 714 1006 XB5 Xstatusdict begin b5tray end X 516 729 12 12 500 704 X*order 1 XNormal X*fonts 78 XAvantGarde-Book XAvantGarde-Demi XBookman-Demi XBookman-Light XCourier XHelvetica XHelvetica-Condensed XHelvetica-Narrow XNewCenturySchlbk-Roman XPalatino-Roman XSymbol XTimes-Roman XZapfChancery-MediumItalic XZapfDingbats XGothicBBB-Medium-83pv-RKSJ-H XGothicBBB-Medium-Add-H- XGothicBBB-Medium-Add-RKSJ-H XGothicBBB-Medium-Add-RKSJ-V XGothicBBB-Medium-H- XGothicBBB-Medium-Add-V XGothicBBB-Medium-EUC-H XGothicBBB-Medium-EUC-V XGothicBBB-Medium-Ext-H- XGothicBBB-Medium-Ext-RKSJ-H- XGothicBBB-Medium-Ext-RKSJ-V XGothicBBB-Medium-Ext-V XGothicBBB-Medium-NWP-H- XGothicBBB-Medium-NWP-V XGothicBBB-Medium-RKSJ-H XGothicBBB-Medium-RKSJ-UserGaiji XGothicBBB-Medium-RKSJ-V XGothicBBB-Medium-V- XGothicBBB-Medium.Oubun XGothicBBB-Medium.Roman XGothicBBB-Medium.WP-Symbol XJun101-Light-83pv-RKSJ-H XJun101-Light-Add-H- XJun101-Light-Add-RKSJ-H XJun101-Light-Add-RKSJ-V XJun101-Light-Add-V XJun101-Light-EUC-H XJun101-Light-EUC-V XJun101-Light-Ext-H XJun101-Light-Ext-RKSJ-H XJun101-Light-Ext-RKSJ-V XJun101-Light-Ext-V XJun101-Light-H XJun101-Light-NWP-H XJun101-Light-NWP-V XJun101-Light-RKSJ-H XJun101-Light-RKSJ-UserGaiji XJun101-Light-RKSJ-V XJun101-Light-V XJun101-Light.Oubun XPCJun101-Light XJun101-Light.Roman XJun101-Light.WP-Symbol XRyumin-Light-83pv-RKSJ-H XRyumin-Light-Add-H XRyumin-Light-Add-RKSJ-H XRyumin-Light-Add-RKSJ-V XRyumin-Light-Add-V XRyumin-Light-EUC-H XRyumin-Light-EUC-V XRyumin-Light-Ext-H XRyumin-Light-Ext-RKSJ-H XRyumin-Light-Ext-RKSJ-V XRyumin-Light-Ext-V XRyumin-Light-H XRyumin-Light-NWP-H XRyumin-Light-NWP-V XRyumin-Light-RKSJ-H XRyumin-Light-RKSJ-UserGaiji XRyumin-Light-RKSJ-V XRyumin-Light-V XRyumin-Light.Oubun XRyumin-Light.Roman XRyumin-Light.WP-Symbol X*slots 2 Xstatusdict begin 1 setpapertray end Xstatusdict begin 2 setpapertray end X*eof END_OF_FILE if test 2277 -ne `wc -c <'defs/cn_500j1.def'`; then echo shar: \"'defs/cn_500j1.def'\" unpacked with wrong size! fi # end of 'defs/cn_500j1.def' fi if test -f 'defs/dp_us470.def' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'defs/dp_us470.def'\" else echo shar: Extracting \"'defs/dp_us470.def'\" $2457 characters$ sed "s/^X//" >'defs/dp_us470.def' <<'END_OF_FILE' X*printer XDataproducts LZR 1260 v47.0 X*paper 22 XLetter Xstatusdict begin lettertray end X 612 792 15 8 597 784 XLegal Xstatusdict begin legaltray end X 612 1008 15 15 597 993 XStatement Xstatusdict begin statementtray end X 396 612 14 8 382 604 XEnvelope.612.792 Xstatusdict begin 3 setpapertray letterenvelope end X 612 792 15 8 597 784 XEnvelope.612.1008 Xstatusdict begin 3 setpapertray legalenvelope end X 612 1008 15 15 597 993 XEnvelope.396.612 Xstatusdict begin 3 setpapertray statementenvelope end X 396 612 14 8 382 604 XEnvelope.595.842 Xstatusdict begin 3 setpapertray a4envelope end X 595 842 14 8 581 834 XEnvelope.420.595 Xstatusdict begin 3 setpapertray a5envelope end X 420 595 15 8 405 588 XEnvelope.516.729 Xstatusdict begin 3 setpapertray b5envelope end X 516 729 13 8 503 721 XEnvelope.567.903 Xstatusdict begin 3 setpapertray folioenvelope end X 567 903 14 8 581 928 XEnvelope.279.639 Xstatusdict begin 3 setpapertray 3.875x8.875envelope end X 279 639 13 15 266 624 XEnvelope.297.684 Xstatusdict begin 3 setpapertray 4.125x9.5envelope end X 297 684 15 15 282 669 XEnvelope.324.747 Xstatusdict begin 3 setpapertray 4.5x10.375envelope end X 324 747 17 15 307 732 XEnvelope.342.792 Xstatusdict begin 3 setpapertray 4.75x11envelope end X 342 792 14 15 328 777 XEnvelope.360.828 Xstatusdict begin 3 setpapertray 5x11.5envelope end X 360 828 15 15 344 813 XEnvelope.468.684 Xstatusdict begin 3 setpapertray 6.5x9.5envelope end X 468 684 16 15 452 669 XEnvelope.540.756 Xstatusdict begin 3 setpapertray 7.5x10.5envelope end X 540 756 13 15 527 741 XEnvelope.630.810 Xstatusdict begin 3 setpapertray 8.75x11.25envelope end X 630 810 16 15 614 795 XA4 X X 595 842 14 8 581 834 XA5 X X 420 595 15 8 405 588 XB5 X X 516 729 13 8 503 721 XFolio X X 567 903 14 8 581 928 X*order 3 XNormal Xstatusdict begin 0 setoutputtray end Xstatusdict begin 1 setoutputtray end X*fonts 13 XAvantGarde-Book XAvantGarde-Demi XBookman-Demi XBookman-Light XCourier XHelvetica XHelvetica-Narrow XNewCenturySchlbk-Roman XPalatino-Roman XSymbol XTimes-Roman XZapfChancery-MediumItalic XZapfDingbats X*slots 4 Xstatusdict begin 0 setpapertray end Xstatusdict begin 1 setpapertray end Xstatusdict begin 2 setpapertray end Xstatusdict begin 3 setpapertray end X*eof END_OF_FILE if test 2457 -ne `wc -c <'defs/dp_us470.def'`; then echo shar: \"'defs/dp_us470.def'\" unpacked with wrong size! fi # end of 'defs/dp_us470.def' fi if test -f 'defs/epl3kf21.def' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'defs/epl3kf21.def'\" else echo shar: Extracting \"'defs/epl3kf21.def'\" $2344 characters$ sed "s/^X//" >'defs/epl3kf21.def' <<'END_OF_FILE' X*printer XEPSON LP-3000PS F2 v52.3 X*paper 13 XLetter Xstatusdict begin lettertray end X 612 792 12 13 602 780 XLegal Xstatusdict begin legaltray end X 612 1008 12 12 594 996 XExecutive Xstatusdict begin executivetray end X 522 756 12 12 510 744 XA4 Xstatusdict begin a4tray end X 595 842 12 12 579 830 XA5 Xstatusdict begin a5tray end X 420 595 10 10 408 585 XB5 Xstatusdict begin b5tray end X 516 729 12 12 502 717 XStatement Xstatusdict begin halflettertray end X 396 612 12 12 379 600 XLetterSmall Xstatusdict begin lettertray end lettersmall X 0 0 30 30 582 762 XA4Small Xstatusdict begin a4tray end a4small X 0 0 31 31 559 811 XGLT Xstatusdict begin glttray end X 576 756 12 13 572 744 XGLG Xstatusdict begin glgtray end X 612 936 12 13 602 924 XF4 Xstatusdict begin f4tray end X 595 935 12 12 579 923 XHagaki Xstatusdict begin hagakitray end X 284 420 12 12 272 408 X*order 1 XNormal X*fonts 58 XAvantGarde-Book XAvantGarde-Demi XBookman-Demi XBookman-Light XCourier XHelvetica XHelvetica-Narrow XNewCenturySchlbk-Roman XPalatino-Roman XSymbol XTimes-Roman XZapfChancery-MediumItalic XZapfDingbats XGothicBBB-Medium-83pv-RKSJ-H XGothicBBB-Medium-83pv-RKSJ-H XGothicBBB-Medium-Add-H XGothicBBB-Medium-Add-RKSJ-H XGothicBBB-Medium-Add-RKSJ-V XGothicBBB-Medium-Add-V XGothicBBB-Medium-EUC-H XGothicBBB-Medium-EUC-V XGothicBBB-Medium-Ext-H XGothicBBB-Medium-Ext-RKSJ-H XGothicBBB-Medium-Ext-RKSJ-V XGothicBBB-Medium-Ext-V XGothicBBB-Medium-H XGothicBBB-Medium-NWP-H XGothicBBB-Medium-NWP-V XGothicBBB-Medium-RKSJ-H XGothicBBB-Medium-RKSJ-UserGaiji XGothicBBB-Medium-RKSJ-UserGaiji XGothicBBB-Medium-RKSJ-V XGothicBBB-Medium-V XGothicBBB-Medium.Oubun XGothicBBB-Medium.Roman XGothicBBB-Medium.WP-Symbol XRyumin-Light-83pv-RKSJ-H XRyumin-Light-83pv-RKSJ-H XRyumin-Light-Add-H XRyumin-Light-Add-RKSJ-H XRyumin-Light-Add-RKSJ-V XRyumin-Light-Add-V XRyumin-Light-EUC-H XRyumin-Light-EUC-V XRyumin-Light-Ext-H XRyumin-Light-Ext-RKSJ-H XRyumin-Light-Ext-RKSJ-V XRyumin-Light-Ext-V XRyumin-Light-H XRyumin-Light-NWP-H XRyumin-Light-NWP-V XRyumin-Light-RKSJ-H XRyumin-Light-RKSJ-UserGaiji XRyumin-Light-RKSJ-V XRyumin-Light-V XRyumin-Light.Oubun XRyumin-Light.Roman XRyumin-Light.WP-Symbol X*slots 2 Xstatusdict begin 0 setpapertray end Xstatusdict begin 1 setpapertray end X*eof END_OF_FILE if test 2344 -ne `wc -c <'defs/epl3kf21.def'`; then echo shar: \"'defs/epl3kf21.def'\" unpacked with wrong size! fi # end of 'defs/epl3kf21.def' fi if test -f 'defs/ibm20470.def' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'defs/ibm20470.def'\" else echo shar: Extracting \"'defs/ibm20470.def'\" $2581 characters$ sed "s/^X//" >'defs/ibm20470.def' <<'END_OF_FILE' X*printer XIBM 4216-020 v47.0 X*paper 21 XLetter Xletter X 612 792 17 19 595 774 XLegal Xlegal X 612 1008 17 19 595 990 XA4 Xa4 X 595 842 18 19 577 823 XA5 Xa5 X 420 595 18 19 401 577 XB5 Xb5 X 516 729 18 19 481 690 XStatement Xstatement X 396 612 18 19 378 594 XEnvelope.612.792 Xstatusdict begin /envelopewidth 612 def /envelopeheight 792 def envelope end X 612 792 15 8 597 784 XEnvelope.612.1008 Xstatusdict begin /envelopewidth 612 def /envelopeheight 1008 def envelope end X 612 1008 15 15 597 993 XEnvelope.396.612 Xstatusdict begin /envelopewidth 396 def /envelopeheight 612 def envelope end X 396 612 14 8 382 604 XEnvelope.595.842 Xstatusdict begin /envelopewidth 595 def /envelopeheight 842 def envelope end X 595 842 14 8 581 834 XEnvelope.420.595 Xstatusdict begin /envelopewidth 420 def /envelopeheight 595 def envelope end X 420 595 15 8 405 588 XEnvelope.516.729 Xstatusdict begin /envelopewidth 516 def /envelopeheight 729 def envelope end X 516 729 13 8 503 721 XEnvelope.567.903 Xstatusdict begin /envelopewidth 567 def /envelopeheight 903 def envelope end X 567 903 14 8 581 928 XEnvelope.279.639 Xstatusdict begin /envelopewidth 279 def /envelopeheight 639 def envelope end X 279 639 13 15 266 624 XEnvelope.297.684 Xstatusdict begin /envelopewidth 297 def /envelopeheight 684 def envelope end X 297 684 15 15 282 669 XEnvelope.324.747 Xstatusdict begin /envelopewidth 324 def /envelopeheight 747 def envelope end X 324 747 17 15 307 732 XEnvelope.342.792 Xstatusdict begin /envelopewidth 342 def /envelopeheight 792 def envelope end X 342 792 14 15 328 777 XEnvelope.360.828 Xstatusdict begin /envelopewidth 360 def /envelopeheight 828 def envelope end X 360 828 15 15 344 813 XEnvelope.468.684 Xstatusdict begin /envelopewidth 468 def /envelopeheight 684 def envelope end X 468 684 16 15 452 669 XEnvelope.540.756 Xstatusdict begin /envelopewidth 540 def /envelopeheight 756 def envelope end X 540 756 13 15 527 741 XEnvelope.630.810 Xstatusdict begin /envelopewidth 630 def /envelopeheight 810 def envelope end X 630 810 16 15 614 795 X*order 1 XNormal X*fonts 18 XAvantGarde-Book XAvantGarde-Demi XBookman-Demi XBookman-Light XCourier XEmulatorfont XGaramond-Light XHelvetica XHelvetica-Black XHelvetica-Light XKorinna-KursivRegular XKorinna-Regular XNewCenturySchlbk-Roman XPalatino-Roman XSymbol XTimes-Roman XZapfChancery-MediumItalic XZapfDingbats X*slots 0 X*eof END_OF_FILE if test 2581 -ne `wc -c <'defs/ibm20470.def'`; then echo shar: \"'defs/ibm20470.def'\" unpacked with wrong size! fi # end of 'defs/ibm20470.def' fi if test -f 'defs/ibm39521.def' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'defs/ibm39521.def'\" else echo shar: Extracting \"'defs/ibm39521.def'\" $1489 characters$ sed "s/^X//" >'defs/ibm39521.def' <<'END_OF_FILE' X*printer XIBM 4019 v52.1 (39 Fonts) X*paper 12 XLetter Xstatusdict begin lettertray end X 612 792 18 17 597 776 XLegal Xstatusdict begin legaltray end X 612 1008 18 17 597 992 XExecutive Xstatusdict begin executivetray end X 522 756 18 17 505 740 XA4 Xstatusdict begin a4tray end X 595 842 18 19 578 827 XA5 Xstatusdict begin a5tray end X 420 595 18 12 405 580 XB5 Xstatusdict begin b5tray end X 516 729 18 17 505 712 XEnvelope.279.540 Xstatusdict begin 3.875x7.5envelopetray end X 279 540 18 13 279 527 XEnvelope.279.639 Xstatusdict begin 3.875x8.875envelopetray end X 279 639 18 13 279 623 XEnvelope.297.684 Xstatusdict begin 4.125x9.5envelopetray end X 297 684 18 14 294 668 XEnvelope.312.624 Xstatusdict begin 110x220envelopetray end X 312 624 18 13 309 608 XEnvelope.460.649 Xstatusdict begin 162x229envelopetray end X 460 649 18 12 455 634 XEnvelope.499.709 Xstatusdict begin 176x250envelopetray end X 499 709 18 12 498 693 X*order 1 XNormal X*fonts 15 XAvantGarde-Book XAvantGarde-Demi XBookman-Demi XBookman-Light XCourier XHelvetica XHelvetica-Black XHelvetica-Light XHelvetica-Narrow XNewCenturySchlbk-Roman XPalatino-Roman XSymbol XTimes-Roman XZapfChancery-MediumItalic XZapfDingbats X*slots 5 Xstatusdict begin 0 setpapertray end Xstatusdict begin 1 setpapertray end Xstatusdict begin 2 setpapertray end Xstatusdict begin 3 setpapertray end Xstatusdict begin 4 setpapertray end X*eof END_OF_FILE if test 1489 -ne `wc -c <'defs/ibm39521.def'`; then echo shar: \"'defs/ibm39521.def'\" unpacked with wrong size! fi # end of 'defs/ibm39521.def' fi if test -f 'defs/ibm39523.def' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'defs/ibm39523.def'\" else echo shar: Extracting \"'defs/ibm39523.def'\" $1497 characters$ sed "s/^X//" >'defs/ibm39523.def' <<'END_OF_FILE' X*printer XIBM 4019 v52.3 or 52.1 (39 fonts) X*paper 12 XLetter Xstatusdict /lettertray get exec X 612 792 18 17 597 776 XLegal Xstatusdict /legaltray get exec X 612 1008 18 18 597 992 XExecutive Xstatusdict /executivetray get exec X 522 756 18 18 505 740 XA4 Xstatusdict /a4tray get exec X 595 842 18 19 578 827 XA5 Xstatusdict /a5tray get exec X 420 595 18 13 405 580 XB5 Xstatusdict /b5tray get exec X 516 729 18 18 505 711 XEnvelope.279.540 Xstatusdict /3.875x7.5envelopetray get exec X 279 540 18 13 278 527 XEnvelope.279.639 Xstatusdict /3.875x8.875envelopetray get exec X 279 639 18 14 278 623 XEnvelope.297.684 Xstatusdict /4.125x9.5envelopetray get exec X 297 684 18 15 294 668 XEnvelope.312.624 Xstatusdict /110x220envelopetray get exec X 312 624 18 14 309 608 XEnvelope.460.649 Xstatusdict /162x229envelopetray get exec X 460 649 18 12 455 634 XEnvelope.499.709 Xstatusdict /176x250envelopetray get exec X 499 709 18 13 497 693 X*order 1 XNormal X*fonts 15 XAvantGarde-Book XAvantGarde-Demi XBookman-Demi XBookman-Light XCourier XHelvetica XHelvetica-Black XHelvetica-Light XHelvetica-Narrow XNewCenturySchlbk-Roman XPalatino-Roman XSymbol XTimes-Roman XZapfChancery-MediumItalic XZapfDingbats X*slots 5 X0 statusdict /setpapertray get exec X1 statusdict /setpapertray get exec X2 statusdict /setpapertray get exec X3 statusdict /setpapertray get exec X4 statusdict /setpapertray get exec X*eof END_OF_FILE if test 1497 -ne `wc -c <'defs/ibm39523.def'`; then echo shar: \"'defs/ibm39523.def'\" unpacked with wrong size! fi # end of 'defs/ibm39523.def' fi if test -f 'defs/ok801+f1.def' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'defs/ok801+f1.def'\" else echo shar: Extracting \"'defs/ok801+f1.def'\" $2401 characters$ sed "s/^X//" >'defs/ok801+f1.def' <<'END_OF_FILE' X*printer XOKI MICROLINE 801PS+F v52.3 X*paper 9 XA4 Xstatusdict begin a4tray end X 595 842 8 8 588 828 XA5 Xstatusdict begin a5tray end X 420 595 8 8 415 582 XB4 Xstatusdict begin b4tray end X 729 1032 8 8 721 1018 XB5 Xstatusdict begin b5tray end X 516 729 13 8 508 721 XPostcard Xstatusdict begin postcardtray end X 283 420 8 8 271 406 XEnvelope1 Xstatusdict begin env1tray end X 666 340 13 8 653 335 XEnvelope2 Xstatusdict begin env2tray end X 581 255 13 8 569 248 XEnvelope3 Xstatusdict begin env3tray end X 666 298 13 8 653 289 XEnvelope4 Xstatusdict begin env4tray end X 842 595 13 8 828 588 X*order 1 XNormal X*fonts 77 XAvantGarde-Book XAvantGarde-Demi XBookman-Light XBookman-Demi XCourier XHelvetica XHelvetica-Narrow XNewCenturySchlbk-Roman XPalatino-Roman XSymbol XTimes-Roman XZapfChancery-MediumItalic XZapfDingbats XGothicBBB-Medium-83pv-RKSJ-H XGothicBBB-Medium-Add-H- XGothicBBB-Medium-Add-RKSJ-H XGothicBBB-Medium-Add-RKSJ-V XGothicBBB-Medium-H- XGothicBBB-Medium-Add-V XGothicBBB-Medium-EUC-H XGothicBBB-Medium-EUC-V XGothicBBB-Medium-Ext-H- XGothicBBB-Medium-Ext-RKSJ-H- XGothicBBB-Medium-Ext-RKSJ-V XGothicBBB-Medium-Ext-V XGothicBBB-Medium-NWP-H- XGothicBBB-Medium-NWP-V XGothicBBB-Medium-RKSJ-H XGothicBBB-Medium-RKSJ-UserGaiji XGothicBBB-Medium-RKSJ-V XGothicBBB-Medium-V- XGothicBBB-Medium.Oubun XGothicBBB-Medium.Roman XGothicBBB-Medium.WP-Symbol XJun101-Light-83pv-RKSJ-H XJun101-Light-Add-H- XJun101-Light-Add-RKSJ-H XJun101-Light-Add-RKSJ-V XJun101-Light-Add-V XJun101-Light-EUC-H XJun101-Light-EUC-V XJun101-Light-Ext-H XJun101-Light-Ext-RKSJ-H XJun101-Light-Ext-RKSJ-V XJun101-Light-Ext-V XJun101-Light-H XJun101-Light-NWP-H XJun101-Light-NWP-V XJun101-Light-RKSJ-H XJun101-Light-RKSJ-UserGaiji XJun101-Light-RKSJ-V XJun101-Light-V XJun101-Light.Oubun XPCJun101-Light XJun101-Light.Roman XJun101-Light.WP-Symbol XRyumin-Light-83pv-RKSJ-H XRyumin-Light-Add-H XRyumin-Light-Add-RKSJ-H XRyumin-Light-Add-RKSJ-V XRyumin-Light-Add-V XRyumin-Light-EUC-H XRyumin-Light-EUC-V XRyumin-Light-Ext-H XRyumin-Light-Ext-RKSJ-H XRyumin-Light-Ext-RKSJ-V XRyumin-Light-Ext-V XRyumin-Light-H XRyumin-Light-NWP-H XRyumin-Light-NWP-V XRyumin-Light-RKSJ-H XRyumin-Light-RKSJ-UserGaiji XRyumin-Light-RKSJ-V XRyumin-Light-V XRyumin-Light.Oubun XRyumin-Light.Roman XRyumin-Light.WP-Symbol X*slots 2 Xstatusdict begin 1 setpapertray end Xstatusdict begin 2 setpapertray end X*eof END_OF_FILE if test 2401 -ne `wc -c <'defs/ok801+f1.def'`; then echo shar: \"'defs/ok801+f1.def'\" unpacked with wrong size! fi # end of 'defs/ok801+f1.def' fi if test -f 'defs/scg20522.def' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'defs/scg20522.def'\" else echo shar: Extracting \"'defs/scg20522.def'\" $2082 characters$ sed "s/^X//" >'defs/scg20522.def' <<'END_OF_FILE' X*printer XScantext 2030/51 X*paper 20 XLetter Xstatusdict begin 612 792 0 1 setpageparams end X 612 792 0 0 612 792 XLetter.Transverse Xstatusdict begin 792 612 0 1 setpageparams end X 792 612 0 0 792 612 XLetter.Extra Xstatusdict begin 684 864 0 1 setpageparams end X 684 864 0 0 684 864 XLetter.Extra.Transverse Xstatusdict begin 864 684 0 1 setpageparams end X 864 684 0 0 864 684 XLegal Xstatusdict begin 612 1008 0 1 setpageparams end X 612 1008 0 0 612 1008 XLegal.Transverse Xstatusdict begin 1008 612 0 1 setpageparams end X 1008 612 0 0 1008 612 XLegal.Extra Xstatusdict begin 684 1080 0 1 setpageparams end X 684 1080 0 0 684 1080 XLegal.Extra.Transverse Xstatusdict begin 1080 684 0 1 setpageparams end X 1080 684 0 0 1080 684 XTabloid Xstatusdict begin 792 1224 0 1 setpageparams end X 792 1224 0 0 792 1224 XTabloid.Transverse Xstatusdict begin 1224 792 0 1 setpageparams end X 1224 792 0 0 1224 792 XTabloid.Extra Xstatusdict begin 842 1296 0 1 setpageparams end X 842 1296 0 0 842 1296 XTabloid.Extra.Transverse Xstatusdict begin 1296 842 0 1 setpageparams end X 1296 842 0 0 1296 842 XA4 Xstatusdict begin 596 842 0 1 setpageparams end X 595 842 0 0 595 842 XA4.Transverse Xstatusdict begin 842 596 0 1 setpageparams end X 841 842 0 0 841 842 XA4.Extra Xstatusdict begin 668 914 0 1 setpageparams end X 667 842 0 0 667 842 XA4.Extra.Transverse Xstatusdict begin 914 668 0 1 setpageparams end X 913 842 0 0 913 842 XA3 Xstatusdict begin 842 1191 0 1 setpageparams end X 841 842 0 0 841 842 XA3.Transverse Xstatusdict begin 1191 842 0 1 setpageparams end X 1190 842 0 0 1190 842 XA3.Extra Xstatusdict begin 914 1263 0 1 setpageparams end X 913 842 0 0 913 842 XA3.Extra.Transverse Xstatusdict begin 1263 914 0 1 setpageparams end X 1262 842 0 0 1262 842 X*order 1 XNormal X*fonts 5 XCourier XHelvetica XHelvetica-Narrow XSymbol XTimes-Roman X*slots 0 X*eof END_OF_FILE if test 2082 -ne `wc -c <'defs/scg20522.def'`; then echo shar: \"'defs/scg20522.def'\" unpacked with wrong size! fi # end of 'defs/scg20522.def' fi if test -f 'defs/tkphzr31.def' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'defs/tkphzr31.def'\" else echo shar: Extracting \"'defs/tkphzr31.def'\" $1932 characters$ sed "s/^X//" >'defs/tkphzr31.def' <<'END_OF_FILE' X*printer XTektronix Phaser III PXi v2010.116 X*paper 21 XLetter X2 dict dup /PageSize [612 792] put X 612 792 21 15 597 776 XLegal X2 dict dup /PageSize [612 1008] put X 612 1008 15 21 596 993 XTabloid X2 dict dup /PageSize [792 1224] put X 792 1224 15 21 776 1209 XTabloidExtra X2 dict dup /PageSize [864 1296] put X 864 1296 15 21 847 1281 XA4 X2 dict dup /PageSize [595 842] put X 595 842 21 15 580 826 XA4.3 X2 dict dup /PageSize [281 595] put X 281 595 15 21 266 580 XA3 X2 dict dup /PageSize [842 1190] put X 842 1190 15 21 826 1175 X4x6 X2 dict dup /PageSize [288 432] put X 288 432 15 21 271 417 X5x7 X2 dict dup /PageSize [360 504] put X 360 504 15 21 344 489 XA5 X2 dict dup /PageSize [420 595] put X 420 595 15 21 404 580 XA6 X2 dict dup /PageSize [297 420] put X 297 420 15 21 281 405 XISOB4 X2 dict dup /PageSize [709 1001] put X 709 1001 15 21 694 986 XISOB5 X2 dict dup /PageSize [499 709] put X 499 709 15 21 483 694 XISOB6 X2 dict dup /PageSize [354 499] put X 354 499 15 21 339 484 XCompliment X2 dict dup /PageSize [283 595] put X 283 595 15 21 268 580 XComm10 X2 dict dup /PageSize [297 684] put X 297 684 15 21 281 669 XC6 X2 dict dup /PageSize [323 459] put X 323 459 15 21 306 444 XDL X2 dict dup /PageSize [312 624] put X 312 624 15 21 296 609 XA4.3Envelope X2 dict dup /PageSize [312 624] put X 312 624 15 21 296 609 XA4.2Envelope X2 dict dup /PageSize [459 624] put X 459 624 15 21 442 609 XA4Envelope X2 dict dup /PageSize [624 918] put X 624 918 15 21 607 903 X*order 1 X X*fonts 14 XAvantGarde-Book XAvantGarde-Demi XBookman-Demi XBookman-Light XCourier XHelvetica XHelvetica-Condensed XHelvetica-Narrow XNewCenturySchlbk-Roman XPalatino-Roman XSymbol XTimes-Roman XZapfChancery-MediumItalic XZapfDingbats X*slots 0 X*eof END_OF_FILE if test 1932 -ne `wc -c <'defs/tkphzr31.def'`; then echo shar: \"'defs/tkphzr31.def'\" unpacked with wrong size! fi # end of 'defs/tkphzr31.def' fi if test -f 'defs/uni39521.def' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'defs/uni39521.def'\" else echo shar: Extracting \"'defs/uni39521.def'\" $1494 characters$ sed "s/^X//" >'defs/uni39521.def' <<'END_OF_FILE' X*printer XUNISYS AP9210 v52.1 (39 Fonts) X*paper 12 XLetter Xstatusdict /lettertray get exec X 612 792 18 17 597 776 XLegal Xstatusdict /legaltray get exec X 612 1008 18 18 597 992 XExecutive Xstatusdict /executivetray get exec X 522 756 18 18 505 740 XA4 Xstatusdict /a4tray get exec X 595 842 18 19 578 827 XA5 Xstatusdict /a5tray get exec X 420 595 18 13 405 580 XB5 Xstatusdict /b5tray get exec X 516 729 18 18 505 711 XEnvelope.279.540 Xstatusdict /3.875x7.5envelopetray get exec X 279 540 18 13 278 527 XEnvelope.279.639 Xstatusdict /3.875x8.875envelopetray get exec X 279 639 18 14 278 623 XEnvelope.297.684 Xstatusdict /4.125x9.5envelopetray get exec X 297 684 18 15 294 668 XEnvelope.312.624 Xstatusdict /110x220envelopetray get exec X 312 624 18 14 309 608 XEnvelope.460.649 Xstatusdict /162x229envelopetray get exec X 460 649 18 12 455 634 XEnvelope.499.709 Xstatusdict /176x250envelopetray get exec X 499 709 18 13 497 693 X*order 1 XNormal X*fonts 15 XAvantGarde-Book XAvantGarde-Demi XBookman-Demi XBookman-Light XCourier XHelvetica XHelvetica-Black XHelvetica-Light XHelvetica-Narrow XNewCenturySchlbk-Roman XPalatino-Roman XSymbol XTimes-Roman XZapfChancery-MediumItalic XZapfDingbats X*slots 5 X0 statusdict /setpapertray get exec X1 statusdict /setpapertray get exec X2 statusdict /setpapertray get exec X3 statusdict /setpapertray get exec X4 statusdict /setpapertray get exec X*eof END_OF_FILE if test 1494 -ne `wc -c <'defs/uni39521.def'`; then echo shar: \"'defs/uni39521.def'\" unpacked with wrong size! fi # end of 'defs/uni39521.def' fi if test -f 'getopt.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'getopt.c'\" else echo shar: Extracting \"'getopt.c'\" $2491 characters$ sed "s/^X//" >'getopt.c' <<'END_OF_FILE' X/* ta=4 */ X X#include <stdio.h> X X X/* X * Here's something you've all been waiting for: the AT&T public domain X * source for getopt(3). It is the code which was given out at the 1985 X * UNIFORUM conference in Dallas. I obtained it by electronic mail X * directly from AT&T. The people there assure me that it is indeed X * in the public domain. X * X * There is no manual page. That is because the one they gave out at X * UNIFORUM was slightly different from the current System V Release 2 X * manual page. The difference apparently involved a note about the X * famous rules 5 and 6, recommending using white space between an option X * and its first argument, and not grouping options that have arguments. X * Getopt itself is currently lenient about both of these things White X * space is allowed, but not mandatory, and the last option in a group can X * have an argument. That particular version of the man page evidently X * has no official existence, and my source at AT&T did not send a copy. X * The current SVR2 man page reflects the actual behavor of this getopt. X * However, I am not about to post a copy of anything licensed by AT&T. X */ X X/* This include is needed only to get "index" defined as "strchr" on Sys V. */ X/* X#include "defs.h" X*/ X X#define index(a,b) strchr(a,b) X X/*LINTLIBRARY*/ X#define NULL 0 X#define EOF (-1) X#define ERR(s, c) if(opterr){\ X extern int write();\ X char errbuf[2];\ X errbuf[0] = c; errbuf[1] = '\n';\ X (void) write(2, argv[0], (unsigned)strlen(argv[0]));\ X (void) write(2, s, (unsigned)strlen(s));\ X (void) write(2, errbuf, 2);} X Xchar *strchr(); X Xint opterr = 1; Xint optind = 1; Xint optopt; Xchar *optarg; X Xint Xgetopt(argc, argv, opts) Xint argc; Xchar **argv, *opts; X{ X static int sp = 1; X register int c; X register char *cp; X X if(sp == 1) X if(optind >= argc || X argv[optind][0] != '-' || argv[optind][1] == '\0') X return(EOF); X else if(strcmp(argv[optind], "--") == NULL) { X optind++; X return(EOF); X } X optopt = c = argv[optind][sp]; X if(c == ':' || (cp=index(opts, c)) == NULL) { X ERR(": illegal option -- ", c); X if(argv[optind][++sp] == '\0') { X optind++; X sp = 1; X } X return('?'); X } X if(*++cp == ':') { X if(argv[optind][sp+1] != '\0') X optarg = &argv[optind++][sp+1]; X else if(++optind >= argc) { X ERR(": option requires an argument -- ", c); X sp = 1; X return('?'); X } else X optarg = argv[optind++]; X sp = 1; X } else { X if(argv[optind][++sp] == '\0') { X sp = 1; X optind++; X } X optarg = NULL; X } X return(c); X} END_OF_FILE if test 2491 -ne `wc -c <'getopt.c'`; then echo shar: \"'getopt.c'\" unpacked with wrong size! fi # end of 'getopt.c' fi if test -f 'man/psfbanner.1' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/psfbanner.1'\" else echo shar: Extracting \"'man/psfbanner.1'\" $1519 characters$ sed "s/^X//" >'man/psfbanner.1' <<'END_OF_FILE' X.\" $Id: psfbanner.1,v 3.1 1991/11/27 06:10:44 ajf Exp ajf $ X.TH psfbanner 1 "" X.SH NAME Xpsfbanner \- print a postscript banner page X.SH SYNOPSIS X.nf Xpsfbanner Userid Name Requestid Printer X Options Date Machineid Title X.fi X [ X.B -b X.I n X] [ X.B -g X.I size X] [ X.B -u X.I f.def X] X.nf X Xwhere: Userid = the originating user's id X Name = user gecos name X Requestid = printer request string X Printer = printer name X Options = use options with -o X Date = current date and time X Machineid = host name X Title = user provided job title X -b n = select paper bin n X -g size = select paper size (letter, b5, etc) X -u f.def = use this printer definition file X X.SH DESCRIPTION X X.I Psfbanner Xprints a job banner using parameters passed to it Xfrom the X.I lp/lpsched Xspooler. X XThe paramters Userid,..., Title are required to Xexist in the order indicated. Options follow Xthe parameters. X X.SH OPTIONS X.TP X.B -b n Xselects paper bin X.I n. XIf not specified, the default paper bin is used. X X.TP X.B -g size Xselects the paper size such as A4, Letter, etc. XIf not specified, then the default paper size is used. X X.TP X.B -g f.def Xselects an alternate version of X.I psfprint.def Xto describe the printer characteristics. X X.SH NOTES X.I Psfbanner Xis used to print banners as part of a printer spooling Xsystem and is not normally used interactively. It is Xactivated in printer models. X X.SH FILES X/usr/spool/lp/model/psf END_OF_FILE if test 1519 -ne `wc -c <'man/psfbanner.1'`; then echo shar: \"'man/psfbanner.1'\" unpacked with wrong size! fi # end of 'man/psfbanner.1' fi if test -f 'man/psfbanner.doc' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/psfbanner.doc'\" else echo shar: Extracting \"'man/psfbanner.doc'\" $1523 characters$ sed "s/^X//" >'man/psfbanner.doc' <<'END_OF_FILE' X X X X psfbanner(1) Unix System V psfbanner(1) X X X X NAME X psfbanner - print a postscript banner page X X SYNOPSIS X psfbanner Userid Name Requestid Printer X Options Date Machineid Title X [ -b n ] [ -g size ] [ -u f.def ] X X where: Userid = the originating user's id X Name = user gecos name X Requestid = printer request string X Printer = printer name X Options = use options with -o X Date = current date and time X Machineid = host name X Title = user provided job title X -b n = select paper bin n X -g size = select paper size (letter, b5, etc) X -u f.def = use this printer definition file X X X DESCRIPTION X Psfbanner prints a job banner using parameters passed to it X from the lp/lpsched spooler. X X The paramters Userid,..., Title are required to exist in the X order indicated. Options follow the parameters. X X X OPTIONS X -b n selects paper bin n. If not specified, the default X paper bin is used. X X X -g size X selects the paper size such as A4, Letter, etc. If not X specified, then the default paper size is used. X X X -g f.def X selects an alternate version of psfprint.def to X describe the printer characteristics. X X X NOTES X Psfbanner is used to print banners as part of a printer X spooling system and is not normally used interactively. It X is activated in printer models. X X X FILES X /usr/spool/lp/model/psf X X X X Page 1 (printed 1/18/92) X X X END_OF_FILE if test 1523 -ne `wc -c <'man/psfbanner.doc'`; then echo shar: \"'man/psfbanner.doc'\" unpacked with wrong size! fi # end of 'man/psfbanner.doc' fi if test -f 'man/psfmail.1' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/psfmail.1'\" else echo shar: Extracting \"'man/psfmail.1'\" $1987 characters$ sed "s/^X//" >'man/psfmail.1' <<'END_OF_FILE' X.\" $Id: psfmail.1,v 3.1 1991/11/27 06:10:44 ajf Exp ajf $ X.TH PSFMAIL 1 "" X.SH NAME Xpsfmail \- postscript mail pre-filter (psf) X.SH SYNOPSIS X X.B psfmail X[ X.B -s X] X.I file file ... > out.file X.nf X Xwhere -s = show all header lines X file = input files (or stdin) X.fi X X.SH EXAMPLE X X psfmail mail.file | psf -2 | lp X X.SH DESCRIPTION X X.I Psfmail Xis a very simple filter for mail documents. It italicizes Xthe Subject: and attempts to place peoples names in boldface. It can be Xused to print entire mail boxes while suppressing unnecessary mail Xheaders. X XNormally, X.I psfmail Xis not used directly: X.I psfmbox Xis used. This is a wrapper for X.I psfmail Xand is much more convenient to use. X XMail box message file may be printed with: X X.nf X psfmail mail.file | psf -2 | lp X.fi X XIf X.I psf Xhas been installed as part of the print spooling system, Xthen the output from psfmail may be passed directly to the X.I lp Xspooler with: X X.nf X psfmail mail.file | lp X.fi X XIf multiple mailboxes are printed, it might be preferable to use the Xcommand (refer to the man pages for psfmbox): X.nf X X psfmbox file file ... X.fi X XThis date-stamps and identifies the mail box name. Each mailbox file Xis treated as a separate print job. This may result in printer banner Xpages for each file. X XIf X.I psfmail Xand X.I psf Xare used with X.I ELM Xthe user's elmrc file should be modified Xto specify the following "print" line (or reasonable approximation): X X.nf X print = /usr/bin/psfmail %s | /usr/bin/psf -2 | /usr/bin/lp X.fi X X.SH OPTIONS X X.TP .9i X.B \-s Xcauses all mail headers to be printed. If this option is not Xspecified, then psfmail will suppress "meaningless" headers such as: X X.nf X Received: X References: X Path: X Message-ID: X.fi X Xand other. If additional headers are to be ignored, the source for Xpsfmail.c must be modified. X X.SH SEE ALSO Xpsf psfbs psfmbox psfnroff psfman X.fi X X.SH AUTHOR XTony Field. tony@ajfcal.cuc.ab.ca END_OF_FILE if test 1987 -ne `wc -c <'man/psfmail.1'`; then echo shar: \"'man/psfmail.1'\" unpacked with wrong size! fi # end of 'man/psfmail.1' fi if test -f 'man/psfmail.doc' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/psfmail.doc'\" else echo shar: Extracting \"'man/psfmail.doc'\" $2127 characters$ sed "s/^X//" >'man/psfmail.doc' <<'END_OF_FILE' X X X X PSFMAIL(1) Unix System V PSFMAIL(1) X X X X NAME X psfmail - postscript mail pre-filter (psf) X X SYNOPSIS X psfmail [ -s ] file file ... > out.file X X where -s = show all header lines X file = input files (or stdin) X X X EXAMPLE X psfmail mail.file | psf -2 | lp X X X DESCRIPTION X Psfmail is a very simple filter for mail documents. It X italicizes the Subject: and attempts to place peoples names X in boldface. It can be used to print entire mail boxes while X suppressing unnecessary mail headers. X X Normally, psfmail is not used directly: psfmbox is used. X This is a wrapper for psfmail and is much more convenient to X use. X X Mail box message file may be printed with: X X psfmail mail.file | psf -2 | lp X X If psf has been installed as part of the print spooling X system, then the output from psfmail may be passed directly X to the lp spooler with: X X psfmail mail.file | lp X X If multiple mailboxes are printed, it might be preferable to X use the command (refer to the man pages for psfmbox): X X psfmbox file file ... X X This date-stamps and identifies the mail box name. Each X mailbox file is treated as a separate print job. This may X result in printer banner pages for each file. X X If psfmail and psf are used with ELM the user's elmrc file X should be modified to specify the following "print" line (or X reasonable approximation): X X print = /usr/bin/psfmail %s | /usr/bin/psf -2 | /usr/bin/lp X X X OPTIONS X -s causes all mail headers to be printed. If this X X X X Page 1 (printed 1/18/92) X X X X X X X PSFMAIL(1) Unix System V PSFMAIL(1) X X X X option is not specified, then psfmail will suppress X "meaningless" headers such as: X X Received: X References: X Path: X Message-ID: X X and other. If additional headers are to be X ignored, the source for psfmail.c must be modified. X X X SEE ALSO X psf psfbs psfmbox psfnroff psfman X X X AUTHOR X Tony Field. tony@ajfcal.cuc.ab.ca X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X Page 2 (printed 1/18/92) X X X END_OF_FILE if test 2127 -ne `wc -c <'man/psfmail.doc'`; then echo shar: \"'man/psfmail.doc'\" unpacked with wrong size! fi # end of 'man/psfmail.doc' fi if test -f 'psf.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'psf.h'\" else echo shar: Extracting \"'psf.h'\" $2431 characters$ sed "s/^X//" >'psf.h' <<'END_OF_FILE' X/* ta=4 X p s f . h X general configuration for psf. X*/ X/* X * $Id: psf.h,v 3.2 1992/01/19 05:50:33 ajf Exp ajf $ X*/ X/**** Configuration information: if not defined in the makefile ***** X * X * DOS users: modify these defaults, no other #defines are necessary X * for msdos users. X */ X X/* default paper size */ X X#ifndef PAPERTYPE X#define PAPERTYPE "letter" X#endif X X/* location of binaries: so psf can find psfdoub */ X X#ifndef BINDIR X#if defined(MSDOS) || defined(__MSDOS__) X#define BINDIR "c:/bin" X#else X#define BINDIR "/local/bin" X#endif X#endif X X/* where is your printer definition file located? */ X X#ifndef PDEF X#if defined(MSDOS) || defined(__MSDOS__) X#define PDEF "psfprint.def" X#else X#define PDEF "/local/lib/psfprint.def" X#endif X#endif X X X/* if two paper trays are available, and you want to use them for X * double sided printing, then make HOPPER defined. X */ X X/* #define HOPPER */ X X/* prefix name for "book" temporary file for reversed or book print X */ X X#ifndef TEMPFILE X#if defined(MSDOS) || defined(__MSDOS__) X#define TEMPFILE "Psf" X#else X#define TEMPFILE "/tmp/Psf" X#endif X#endif X X/* bookwork file name if multiple hoppers not available. X */ X#ifndef BOOKDFILE X#define BOOKFILE "psfbook.psd" X#endif X X/* change the following names only if you have reason to change X * the default names of psfdoub or psfbanner X */ X X#ifndef PSFDOUB X#define PSFDOUB "psfdoub" X#endif X X#ifndef PSFBANNER X#define PSFBANNER "psfbanner" X#endif X X/********* end configuration **********/ X X/* the following are 'escape' sequences used by psf, psfbs & psfmail X used to generate bold, underline, etc. What should be used X for EBCDIC??? change if needed.... X*/ X X#define ESCAPE 0x05 /* CTL/E */ X X#define BEGIN_BOLD "\005B" X#define END_BOLD "\005b" X X#define BEGIN_UNDERLINE "\005U" X#define END_UNDERLINE "\005u" X X#define BEGIN_ITALICS "\005I" X#define END_ITALICS "\005i" X X/* for psfmbox/psfmail */ X X#define BEGIN_NAME "\005F1\005B\005P13" /* Helvetica bold 13 point */ X#define END_NAME "\005p\005b\005f" X X#define BEGIN_SUBJECT "\005P13\005F1\005B\005I" /* Helvetica bold italic 13 point */ X#define END_SUBJECT "\005i\005b\005f\005p" /* return to normal point, font */ X X/* other stuff */ X X#define min(x,y) ((x) < (y) ? (x) : (y)) X#define max(x,y) ((x) > (y) ? (x) : (y)) X X#define MAX_PAGES 1000 /* max pages in a book */ X#define LONG_STR 1000 /* max bytes in an input text line */ X X#define NSLOTS 6 X#define NPAGE 30 END_OF_FILE if test 2431 -ne `wc -c <'psf.h'`; then echo shar: \"'psf.h'\" unpacked with wrong size! fi # end of 'psf.h' fi if test -f 'psfman.SH' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'psfman.SH'\" else echo shar: Extracting \"'psfman.SH'\" $1501 characters$ sed "s/^X//" >'psfman.SH' <<'END_OF_FILE' X: X# $Id: psfman.SH,v 3.2 1992/01/19 05:50:33 ajf Exp ajf $ X# Print man pages using psf filters -- guess about chapters, X# even allow Xenix chapter conventions. X# X# The "-r 3" option in psfbs below removes 3 blank lines between X# pages (to allow correct printing in the imageable area of the X# postscript printer). Different printers may require different X# number of lines to remove. (see psfbs.1) X X# If European paper sizes are used, possibly "force" psf to X# use 63 lines of output. This may (i.e. untested) work for A4: X# X# psfbs -i -r 3 | psf -l63 -c80 -2 | PRINTER $banneropt X X# set the binary name for man: X# MANBIN="/usr/bin/man" XMANBIN=man X X# Some man systems require additional options such as -Tlp X# while other consider it an error. X# manopts=-Tlp X X# Printing banners. Suit your preferences, check the "psfbs" line below X# for compliance. X Xcase PRINTER in Xlpr) nobanner="-h" X ;; Xlp) nobanner="-o nobanner" X ;; Xesac Xbanneropt="" X X Xusage () { X echo "Usage: $0 [chapter] page page ..." X echo " e.g. $0 vi sh" X exit 0 X} X Xcase $# in X0) usage X ;; Xesac Xcase $1 in X-) usage X ;; X--) usage X ;; Xesac X Xcase $1 in X[CFMS1-9] | CP | CT | DOS | HW | LOCAL | UCB ) CHAPTER=$1 X shift;; Xesac X Xtempfile=/tmp/PSF$$ Xtrap "rm -f $tempfile ; exit 0" 1 2 15 Xwhile test "$1" != "" Xdo X if ( $MANBIN $manopts $CHAPTER "$1" > $tempfile ) then X psfbs -i -r 3 $tempfile | psf -2 | PRINTER $banneropt X banneropt=$nobanner X else X echo "unknown man page: $1" X fi X shift Xdone Xrm $tempfile Xexit 0 END_OF_FILE if test 1501 -ne `wc -c <'psfman.SH'`; then echo shar: \"'psfman.SH'\" unpacked with wrong size! fi chmod +x 'psfman.SH' # end of 'psfman.SH' fi if test -f 'psfproto.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'psfproto.h'\" else echo shar: Extracting \"'psfproto.h'\" $1467 characters$ sed "s/^X//" >'psfproto.h' <<'END_OF_FILE' X#ifdef __STDC__ X/* psf.c */ Xint main(int argc, char *argv[]); Xvoid scale_factors(void); Xvoid prologue(void); Xvoid showpage(int end_of_file); Xvoid set_frame(void); Xvoid set_y_coord(void); Xvoid put_top(void); Xvoid process_file(void); Xint escape_sequence(int which); Xvoid moveto(int x, int y, int do_move); Xvoid findfont(void); Xvoid start_file(void); Xvoid terminate_printer(void); Xvoid draw_cross(void); Xvoid set_clip_path(int x1, int y1, int x2, int y2); Xvoid output_book(char *bookfile); Xint tscan(char s[], char t[]); Xvoid get_time(char *t); Xint compare(char *a, char *b); Xint partial_compare(char *a, char *b); Xint comparen(char *a, char *b, int n); Xint endcompare(char *a, char *b); Xvoid trim(char *s); Xvoid bad_file(void); Xint xtoi(int c); Xvoid catch(int signo); Xvoid replacement_fonts(void); Xint otoi(char *s); Xvoid usage(void); Xvoid size_display(void); Xvoid output_trouble(int); X#else X/* psf.c */ Xint main(); Xvoid scale_factors(); Xvoid prologue(); Xvoid showpage(); Xvoid set_frame(); Xvoid set_y_coord(); Xvoid put_top(); Xvoid process_file(); Xint escape_sequence(); Xvoid moveto(); Xvoid findfont(); Xvoid start_file(); Xvoid terminate_printer(); Xvoid draw_cross(); Xvoid set_clip_path(); Xvoid output_book(); Xint tscan(); Xvoid get_time(); Xint compare(); Xint partial_compare(); Xint comparen(); Xint endcompare(); Xvoid trim(); Xvoid bad_file(); Xint xtoi(); Xvoid catch(); Xvoid replacement_fonts(); Xint otoi(); Xvoid usage(); Xvoid size_display(); Xvoid output_trouble(); X#endif END_OF_FILE if test 1467 -ne `wc -c <'psfproto.h'`; then echo shar: \"'psfproto.h'\" unpacked with wrong size! fi # end of 'psfproto.h' fi if test -f 'psfunix.LP' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'psfunix.LP'\" else echo shar: Extracting \"'psfunix.LP'\" $2328 characters$ sed "s/^X//" >'psfunix.LP' <<'END_OF_FILE' X: X# $Id: psfunix.LP,v 3.1 1991/11/27 06:02:58 ajf Exp ajf $ X# Postscript serial or parallel printer using psf filters X# X# "make scripts" will use sed to replace "BINARY" with X# the binary library directory name such as /local/bin. X X# The following parameters are passed from "lp" at print time. X Xprinter=`basename $0` Xrequest=$1 Xname=$2 Xtitle=$3 Xcopies=$4 Xoptions=$5 Xshift; shift; shift; shift; shift X X# Modify the following for required stty settings. X Xstty onlcr ixon ixoff 0<&1 X X# get the banner option from the configuration file. X# see if the user is allowed to override the banner spec. X# The "Banner: on" and "Banner: on:Always" can be specified by lpadmin. X# The "Banner: off" must be manually edited into the configuration file. X Xbanner="yes" Xbanopt=`sed -n 's/^Banner: *$.*$.*$/\1/p' /usr/spool/lp/admins/lp/printers/$printer/configuration` Xmustbanner="no" Xfor i in ${banopt} Xdo X case "${i}" in X X on) banner="yes" X mustbanner="no" X ;; X on:Always) banner="yes" X mustbanner="yes" X ;; X off) banner="no" X mustbanner="no" X ;; X *) banner="yes" X mustbanner="no" X ;; X esac Xdone X Xoption_list=$options Xoptions= Xfor i in ${option_list} Xdo X case "${i}" in X X *@*) rname="${i}" X ;; X nobanner) X case "${mustbanner}" in X yes) ;; X *) banner="no" X ;; X esac X ;; X banner) X banner="yes" X ;; X *) X options="${options} ${i}" X ;; X esac; Xdone X Xtoday=`date` X X[ "$title " = " " ] && { X title=`basename $1` X} X X[ "$banner" = "yes" ] && { X X# get the machine name uname. X sysid=`uname -n` X X# get the user name from the GCOS field in /etc/passwd X user=`sed -n "s/^$name:.*:.*:.*:$.*$:.*:.*$/\1/p" /etc/passwd` X X# user is on remote system X case $rname in X [0-z]*) name=$rname X ;; X esac X X BINARY/psfbanner "$name" "$user" "$request" "$printer" "$options" "$today" "$sysid" "$title" -g PAGETYPE -u DEFFILE X} X X# If the file looks like it is in postscript, then psffilter X# copies the file to the printer. (unless -z is specified) X# The "$options" are passed by lp with -o"opions" X X# To ensure that file names do not push off the date stamp, X# you might wish to use: X# X# fname=`basename $file` X# BINARY/psffilter $options "$fname" <$file 2>&1 X Xfiles="$*" Xwhile [ "$copies" -gt 0 ] Xdo X for file in $files X do X BINARY/psffilter -g PAGETYPE $options "$file" <$file 2>&1 X done X copies=`expr $copies - 1` Xdone Xexit 0 END_OF_FILE if test 2328 -ne `wc -c <'psfunix.LP'`; then echo shar: \"'psfunix.LP'\" unpacked with wrong size! fi chmod +x 'psfunix.LP' # end of 'psfunix.LP' fi if test -f 'psfxenix.LP' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'psfxenix.LP'\" else echo shar: Extracting \"'psfxenix.LP'\" $1791 characters$ sed "s/^X//" >'psfxenix.LP' <<'END_OF_FILE' X#! Postscript serial or parallel printer using psf filters X# X# NOTE: the above line is displayed on the "mkdev lp" printer X# ^^^^^ selection list. If you create multiple printer models, X# edit the above to signify the options invoked with psf. X# X# This print model works with Xenix 2.2.3, 2.3.2. It is the printer X# back-end that is called by lp for physical printing. X# X# "make installxenix" will use sed to replace "BINARY" with X# the binary library directory name. X X# The following parameters are passed from "lp" at print time. X Xprinter=`basename $0` Xrequest=$1 Xname=$2 Xtitle=$3 Xcopies=$4 Xoptions=$5 Xshift; shift; shift; shift; shift X X# Modify the following for required stty settings. X Xstty onlcr ixon ixoff 0<&1 X Xbanner=yes Xtoday=`date` Xfor i in $options; do X case $i in X b) banner=no ;; X esac Xdone X X[ "$title " = " " ] && { X title=`basename $1` X} X X[ "$banner" = yes ] && { X X# get the machine name X X if test -r /etc/systemid; then X sysid=`sed 1q /etc/systemid` X else X sysid=`uname -n` X fi X X# get the user name from the GCOS field in /etc/passwd X X user=`sed -n "s/^$name:.*:.*:.*:$.*$:.*:.*$/\1/p" /etc/passwd` X X# get the count of the number of banner pages from /etc/default/lpd X X bannercount=`sed -n 's/^BANNERS=//p' /etc/default/lpd` X [ "$bannercount" -ge 0 -a "$bannercount" -le 5 ] || bannercount=1 X while [ "$bannercount" -gt 0 ] X do X BINARY/psfbanner "$name" "$user" "$request" "$printer" "$options" "$today" "$sysid" "$title" -g PAGETYPE -u DEFFILE X bannercount=`expr $bannercount - 1` X done X} X X# psffilter filters the file unless it already is in postscript X# X# The "$options" are passed by lp with -o"opions" X Xfiles="$*" Xwhile [ "$copies" -gt 0 ] Xdo X for file in $files X do X BINARY/psffilter $options "$file" 2>&1 X done X copies=`expr $copies - 1` Xdone Xexit 0 END_OF_FILE if test 1791 -ne `wc -c <'psfxenix.LP'`; then echo shar: \"'psfxenix.LP'\" unpacked with wrong size! fi chmod +x 'psfxenix.LP' # end of 'psfxenix.LP' fi echo shar: End of archive 4 $of 9$. cp /dev/null ark4isdone MISSING="" for I in 1 2 3 4 5 6 7 8 9 ; do if test ! -f ark${I}isdone ; then MISSING="${MISSING} ${I}" fi done if test "${MISSING}" = "" ; then echo You have unpacked all 9 archives. rm -f ark[1-9]isdone ark[1-9][0-9]isdone else echo You still need to unpack the following archives: echo " " ${MISSING} fi ## End of shell archive. exit 0 exit 0 # Just in case...